define plus
proc(i, j)
return := i + j
end;

define mult
proc(k, l)
return := k * l
end;

define twostep
proc(c, d, e)
return := plus( mult ( c, d ) , e )
end;

p := plus;
m := mult;
u := 4;
v := 5;
w := 7;
x := twostep(u, v, w)
